package com.xmg.dataStructure.tensuanfa;

import java.awt.*;
import java.util.ArrayList;
import java.util.Comparator;
import java.util.HashMap;
import java.util.Map;

/**
 * 马踏棋盘算法实现
 *
 * @Author: mazhongqing
 * @Date: 2021/3/16 14:12
 */
public class HorseChessBoard {
    private static int X;   //棋盘的列数
    private static int Y;   //棋盘的行数
    private static boolean visited[];//标记棋盘的各个位置是否被访问过
    private static boolean finished;//标记是否棋盘的所有位置都被访问  如果是true 表示成功

    public static void main(String[] args) {
        System.out.println("骑士周游算法，开始执行");
        X = 8;
        Y = 8;
        int row = 1;
        int column = 1;
        int[][] chessboard = new int[X][Y];
        visited = new boolean[X * Y];
        //traversalChessboard(chessboard, row - 1, column - 1, 1);
        //输出棋盘的最后情况
        for (int[] rows : chessboard) {
            for (int step : rows) {
                System.out.print(step + "\t");
            }
            System.out.println();
        }

        Map<String,Integer> map = new HashMap<>();
        map.put("xmg",map.getOrDefault("xmg",0)+1);
        map.put("xmg",map.getOrDefault("xmg",0)+1);
        map.put("xmg",map.getOrDefault("xmg",0)+1);
        System.out.println(map);
    }

    public static void traversalChessboard(int[][] chessboard, int row, int column, int step) {
        chessboard[row][column] = step;
        visited[row * X + column] = true;
        ArrayList<Point> ps = next(new Point(column, row));
        //使用贪心算法进行优化，每次走下一步的下一步可走最少步数的point
        sort(ps);
        //遍历ps
        while (!ps.isEmpty()) {
            Point p = ps.remove(0);//取出下一个可以走的地方
            //判断改点是否已经访问过
            if (!visited[p.y * X + p.x]) {//说明没有访问过
                traversalChessboard(chessboard, p.y, p.x, step + 1);
            }
        }
        //判断马儿是否完成了任务，使用step和应该走的步数进行比较
        //如果没有达到数量，则表示没有完成任务，将整个棋盘置0
        //说明：step < X*Y的情况有两种
        //1、棋盘到目前位置，没有走完
        //2、棋盘处于一个回溯的过程
        if (step < X * Y && !finished) {
            System.out.println("回溯");
            chessboard[row][column] = 0;
            visited[row * X + column] = false;
        } else {
            finished = true;
        }
    }

    /**
     * 根据当前位置（Point对象），计算马儿还能走哪些位置（Point），并放入到一个集合中（ArrayList）
     * 最多有8个位置
     *
     * @param curPoint 当前点
     * @return 下一步可以走的点
     */
    public static ArrayList<Point> next(Point curPoint) {
        ArrayList<Point> ps = new ArrayList<>();
        Point p1 = new Point();
        //依次判断下一步可以走的点
        if ((p1.x = curPoint.x - 2) >= 0 && (p1.y = curPoint.y - 1) >= 0) {
            ps.add(new Point(p1));
        }
        if ((p1.x = curPoint.x - 1) >= 0 && (p1.y = curPoint.y - 2) >= 0) {
            ps.add(new Point(p1));
        }
        if ((p1.x = curPoint.x + 1) < X && (p1.y = curPoint.y - 2) >= 0) {
            ps.add(new Point(p1));
        }
        if ((p1.x = curPoint.x + 2) < X && (p1.y = curPoint.y - 1) >= 0) {
            ps.add(new Point(p1));
        }
        if ((p1.x = curPoint.x + 2) < X && (p1.y = curPoint.y + 1) < Y) {
            ps.add(new Point(p1));
        }
        if ((p1.x = curPoint.x + 1) < X && (p1.y = curPoint.y + 2) < Y) {
            ps.add(new Point(p1));
        }
        if ((p1.x = curPoint.x - 1) >= 0 && (p1.y = curPoint.y + 2) < Y) {
            ps.add(new Point(p1));
        }
        if ((p1.x = curPoint.x - 2) >= 0 && (p1.y = curPoint.y + 1) < Y) {
            ps.add(new Point(p1));
        }
        return ps;
    }
    //根据当前这一步的所有下一步选择位置，进行非递减排序，减少回溯的次数
    public static void sort(ArrayList<Point> ps){
        ps.sort(new Comparator<Point>() {
            @Override
            public int compare(Point o1, Point o2) {
                int count1 = next(o1).size();
                int count2 = next(o2).size();
                if(count1<count2){
                    return -1;
                }else if(count1==count2){
                    return 0;
                }else{
                    return 1;
                }
            }
        });
    }

}
